home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1986 August / 1986-08.d64 / on-line multi st (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  3KB  |  44 lines
  1. 20 poke53272,23:poke53280,7:poke53281,7:print"[147]"tab(8)" [194]anana [211]oftware, [201]nc."
  2. 21 print" ":printtab(12)"1986 [193]dvertisers":print"[196]aily [210]acing [198]orm ** [199]amblin";
  3. 22 print"g [212]imes **":print"[212]horoughbred [194]usiness ** [210].[210]. [194]owker ** [195]omputer [211]";
  4. 23 print"hopper ** [208][195] [215]orld ** [195]ompute!":printtab(6)" [198]ifteen [212]imes [212]h";
  5. 24 print"e [208]ower! ":printtab(6)" 99.99%  [195]onfidence [204]evel ":print
  6. 25 print"[215]hy purchase only 1 thoroughbred handi- capping strategy when you ca";
  7. 26 print"n have the  [208][207][215][197][210] of the 15 most popular handicap-  ping strategies";
  8. 27 print" available?":print:print"[193] new computer program, designed by an  [205].[194]";
  9. 28 print".[193]. of [198]inance, combines improved    variations of the 15 most popul";
  10. 29 print"ar strat-egies into one easy program. [212]his [208][207][215][197][210]-[198][213][204] program called";
  11. 30 print" [205][213][204][212][201]-[211][212][210][193][212][211] can an- alyze a race using 15 strategies in a   fracti";
  12. 31 print"on of the time you analyze a race using just 1 strategy.":gosub80
  13. 35 print"[211]imply type in the answers to the pro-  gram questions.  [193]ll the ";
  14. 36 print"info is in the [196]aily [210]acing [198]orm.  [212]he results of the  15 strategies";
  15. 37 print" will appear on your screenor printer.  [205]ulti-[211]trats then tabulates";
  16. 38 print"the 15 strategy totals to give you an   ultimate number for each ";
  17. 39 print"horse.":print:print"[215]hen all 15 strategies select the same  horse to";
  18. 40 print" win, that horse has a 99.99%   chance of winning!":print
  19. 41 printtab(11)" [205]ulti-[211]trats [208]lus [146]":print:print"15 strategies ** 100 page";
  20. 42 print" booklet (with money management) ** disk or tape **    telephone ";
  21. 43 print"hotline number ** immediate   first class delivery ** [194][207][206][213][211] #1 [193]udio "
  22. 44 print"[211]eminar ** [194][207][206][213][211] #2 [204]ottery program **  [194][207][206][213][211] #3 [212]ri-[193]nnual [206]ewslett";
  23. 45 print"er ** 10 [196]ay[205]oney-[194]ack [199]uarantee ** [193]ll for  $125.":gosub80
  24. 49 printtab(9)" [214]oice [205]ulti-[211]trats [146]":print:print"[211]it back with the form an";
  25. 50 print"d talk into    your headset. [205]ulti-[211]trats hears you andresponds! ";
  26. 51 print"[214]oice [205]ulti-[211]trats includes   [205]ulti-[211]trats plus and a ** [214]oice [205]odule"
  27. 52 print"** [200]eadset ** [193]dditional [211]oftware ** [193]llfor $225. ([195][207][205][205][207][196][207][210][197], [193]pple";
  28. 53 print", [193]tari)":print
  29. 54 printtab(8)" [207]n-[204]ine [205]ulti-[211]trats [146]":print:print"[201]nvitations with either ";
  30. 55 print"[205]ulti-[211]trats or-der. [204]imited membership geographically.":gosub80
  31. 59 print"[207]rder by [205]oney [207]rder, [195]heck, [214]isa, [205][195],  [193][205][197][216], or [195].[207].[196]. to:":print
  32. 60 printtab(7)"[176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"
  33. 61 printtab(7)"[221] [194]anana [211]oftware, [201]nc. [221]"spc(15)"[221] [196]ept. [211][196]              [221]"
  34. 62 printtab(7)"[221] 6531 [208]ark [193]venue      [221]"spc(15)"[221] [203]ent, [207]hio 44240      [221]"
  35. 63 printtab(7)"[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]":print
  36. 64 print"[208][200][207][206][197][160][207][210][196][197][210][211]: (216) 673-6969"
  37. 65 print"   [201][206][209][213][201][210][201][197][211]: (216) 673-6167 [recording]"
  38. 66 printtab(13)" [193][204][204][160][205][207][196][197][204][211] [146]":print:printtab(6)"[195][207][205][205][207][196][207][210][197] ** [193]pple ** [193]tari"
  39. 67 printtab(6)"[201][194][205] ** [210]adio [211]hack ** [195]oleco":gosub80
  40. 70 run
  41. 80 print:printtab(12)" [208]ress [193]ny [203]ey [146]";
  42. 81 geta$:ifa$=""then81
  43. 82 print"[147]"tab(8)" [194]anana [211]oftware, [201]nc. [146]":print:return
  44.